Carousel/CAROUSEL.cdr/mactosh/da/hyperda.sit/HyperDA Dialer w_Modem/card_3862.txt

Text File | 1988-07-27 | 27.4 KB | 1,371 lines

-- card: 3862 from stack: in
-- bmap block id: 4200
-- flags: 0000
-- background id: 3622
-- name:
----- HyperTalk script -----
on asknumber
  global thenumber
  ask "Phone Number?"
  if it <> empty then
    put it into thenumber
  end if
end asknumber

on closecard
  hide card field "about"
end closecard




-- part 3 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=353 top=165 right=188 bottom=392
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 2
----- HyperTalk script -----
on mouseUp
  dial 2 with modem
end mouseUp



-- part 13 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=354 top=258 right=281 bottom=393
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 0
----- HyperTalk script -----
on mouseUp
  dial 0 with modem
end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=401 top=165 right=188 bottom=440
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 3
----- HyperTalk script -----
on mouseUp
  dial 3 with modem
end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=307 top=165 right=188 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 1
----- HyperTalk script -----
on mouseUp
  dial 1 with modem
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=353 top=197 right=220 bottom=392
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 5
----- HyperTalk script -----
on mouseUp
  dial 5 with modem
end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=353 top=228 right=251 bottom=392
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 8
----- HyperTalk script -----
on mouseUp
  dial 8 with modem
end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=400 top=197 right=220 bottom=439
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 6
----- HyperTalk script -----
on mouseUp
  dial 6 with modem
end mouseUp



-- part 19 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=401 top=228 right=251 bottom=440
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 9
----- HyperTalk script -----
on mouseUp
  dial 9 with modem
end mouseUp



-- part 20 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=400 top=255 right=278 bottom=439
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: #
----- HyperTalk script -----
on mouseUp
  dial "#" with modem
end mouseUp



-- part 21 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=306 top=255 right=278 bottom=345
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: *
----- HyperTalk script -----
on mouseUp
  dial "*" with modem
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=307 top=197 right=220 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 4
----- HyperTalk script -----
on mouseUp
  dial 4 with modem
end mouseUp



-- part 23 (button)
-- low flags: 00
-- high flags: 8000
-- rect: left=307 top=229 right=252 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 7
----- HyperTalk script -----
on mouseUp
  dial 7 with modem
end mouseUp



-- part 25 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=33 right=46 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d1
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n1" into thenumber
    asknumber
    put thenumber into card field "n1"
  else
    dial card field "n1" with modem
  end if
end mouseUp



-- part 26 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=30 right=48 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 28 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=52 right=70 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 29 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=74 right=92 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 30 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=96 right=114 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 31 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=118 right=136 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 32 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=140 right=158 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 33 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=162 right=180 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 34 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=183 right=201 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 35 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=204 right=222 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 36 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=226 right=244 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 37 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=248 right=266 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 38 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=270 right=288 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 39 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=292 right=310 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 40 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=43 top=314 right=332 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 42 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=54 right=67 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d3
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n3" into thenumber
    asknumber
    put thenumber into card field "n3"
  else
    dial card field "n3" with modem
  end if
end mouseUp



-- part 43 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=76 right=89 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d4
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n4" into thenumber
    asknumber
    put thenumber into card field "n4"
  else
    dial card field "n4" with modem
  end if
end mouseUp



-- part 44 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=99 right=112 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d5
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n5" into thenumber
    asknumber
    put thenumber into card field "n5"
  else
    dial card field "n5" with modem
  end if
end mouseUp



-- part 45 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=120 right=133 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d6
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n6" into thenumber
    asknumber
    put thenumber into card field "n6"
  else
    dial card field "n6" with modem
  end if
end mouseUp



-- part 47 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=142 right=155 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d7
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n7" into thenumber
    asknumber
    put thenumber into card field "n7"
  else
    dial card field "n7" with modem
  end if
end mouseUp



-- part 48 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=164 right=177 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d8
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n8" into thenumber
    asknumber
    put thenumber into card field "n8"
  else
    dial card field "n8"  with modem
  end if
end mouseUp



-- part 49 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=186 right=199 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d9
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n9" into thenumber
    asknumber
    put thenumber into card field "n9"
  else
    dial card field "n9" with modem
  end if
end mouseUp



-- part 50 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=206 right=219 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d10
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n10" into thenumber
    asknumber
    put thenumber into card field "n10"
  else
    dial card field "n10" with modem
  end if
end mouseUp



-- part 51 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=228 right=241 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d11
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n11" into thenumber
    asknumber
    put thenumber into card field "n11"
  else
    dial card field "n11" with modem
  end if
end mouseUp



-- part 52 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=251 right=264 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d12
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n12" into thenumber
    asknumber
    put thenumber into card field "n12"
  else
    dial card field "n12" with modem
  end if
end mouseUp



-- part 53 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=272 right=285 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d13
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n13" into thenumber
    asknumber
    put thenumber into card field "n13"
  else
    dial card field "n13" with modem
  end if
end mouseUp



-- part 54 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=294 right=307 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d14
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n14" into thenumber
    asknumber
    put thenumber into card field "n14"
  else
    dial card field "n14" with modem
  end if
end mouseUp



-- part 55 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=20 top=317 right=330 bottom=34
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d15
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n15" into thenumber
    asknumber
    put thenumber into card field "n15"
  else
    dial card field "n15" with modem
  end if
end mouseUp



-- part 57 (button)
-- low flags: 80
-- high flags: A005
-- rect: left=277 top=307 right=330 bottom=354
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Program


-- part 58 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=29 right=46 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n1


-- part 60 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=53 right=70 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n3


-- part 61 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=75 right=92 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n4


-- part 62 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=96 right=113 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n5


-- part 63 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=119 right=136 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n6


-- part 64 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=141 right=158 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n7


-- part 65 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=163 right=180 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n8


-- part 66 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=184 right=201 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n9


-- part 67 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=206 right=223 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n10


-- part 68 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=228 right=245 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n11


-- part 69 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=200 top=249 right=266 bottom=340
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n12


-- part 70 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=200 top=271 right=288 bottom=340
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n13


-- part 71 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=293 right=310 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n14


-- part 72 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=199 top=315 right=332 bottom=339
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n15


-- part 74 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=293 top=30 right=48 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 75 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=293 top=53 right=71 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 76 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=293 top=75 right=93 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 77 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=293 top=97 right=115 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 78 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=293 top=120 right=138 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:


-- part 79 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=269 top=33 right=46 bottom=283
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d16
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n16" into thenumber
    asknumber
    put thenumber into card field "n16"
  else
    dial card field "n16" with modem
  end if
end mouseUp



-- part 80 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=269 top=56 right=69 bottom=283
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d17
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n17" into thenumber
    asknumber
    put thenumber into card field "n17"
  else
    dial card field "n17" with modem
  end if
end mouseUp



-- part 81 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=269 top=78 right=91 bottom=283
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d18
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n18" into thenumber
    asknumber
    put thenumber into card field "n18"
  else
    dial card field "n18" with modem
  end if
end mouseUp



-- part 82 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=269 top=100 right=113 bottom=283
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d19
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n19" into thenumber
    asknumber
    put thenumber into card field "n19"
  else
    dial card field "n19" with modem
  end if
end mouseUp



-- part 83 (button)
-- low flags: 00
-- high flags: 2002
-- rect: left=269 top=123 right=136 bottom=283
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: d20
----- HyperTalk script -----
on mouseUp
  if hilite of button "program" is true then
    global thenumber
    put card field "n20" into thenumber
    asknumber
    put thenumber into card field "n20"
  else
    dial card field "n20" with modem
  end if
end mouseUp



-- part 84 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=353 top=7 right=23 bottom=480
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n16


-- part 85 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=353 top=29 right=45 bottom=480
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n17


-- part 86 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=355 top=53 right=69 bottom=482
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n18


-- part 87 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=355 top=75 right=91 bottom=482
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n19


-- part 88 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=354 top=96 right=112 bottom=481
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: n20


-- part 89 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=476 top=304 right=332 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  go home
end mouseUp



-- part 90 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=456 top=297 right=317 bottom=487
-- title width / last selected line: 0
-- icon id / first selected line: 19678 / 19678
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
  show card field "about"
end mouseUp



-- part 91 (field)
-- low flags: 81
-- high flags: 0002
-- rect: left=111 top=50 right=228 bottom=424
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: about
----- HyperTalk script -----
on mouseup
  hide card field "about"
end mouseup



-- part contents for card part 26
----- text -----
Symmetry

-- part contents for card part 58
----- text -----
1-602-844-2199

-- part contents for card part 91
----- text -----
To program the dialer with your often called numbers:

With HyperCard
ΓÇó Click on the ΓÇ£ProgramΓÇ¥ check box.
ΓÇó Click the button to program.
ΓÇó Type the phone number.
ΓÇó Click OK.
ΓÇó Click ΓÇ£ProgramΓÇ¥ again to dial.

This is the Modem version (M).


-- part contents for card part 84
----- text -----